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GENERAL 


MINIGAP  is  a modular  FORTRAN  system  which  allows  users  to 
design  their  own  report  formats  fairly  flexibly.  It  is  a 
general  system,  in  that  it  allows  users  to  access  different 
types  of  data,  in  different  databases,  and  to  formulate  new 
reports  at  run-time. 

It  is  a set  of  34  FORTRAN  modules.  There  is  a main  routine, 
a block  data  subroutine,  five  report  generating  subroutines 
and  26  supporting  subroutines.  REP010  generates  a report  which 
is  specific  to  NCD-5.  Since  this  report  is  very  specific,  it 
would  be  of  little  use  to  someone  else.  No  user  documentation 
is  provided  for  this  report,  and  there  is  little  programming 
documentation  provided. 

A pictorial  description  of  the  system  is  provided  in  the 
section  'FLOW  OF  CONTROL.' 

This  system  is  installed  on  the  INTERDATA  7/32.  The 
computer  system  configuration  contained  256  K bytes  of  core 
storage  at  installation.  Using  overlays,  squeeze  options  on 
compilations,  and  byte-programming  (as  necessary) , we  were 
able  to  set  up  this  system  with  167  K bytes.  This  does  not 
allow  room  for  any  other  systems  to  operate  at  the  same  time 
on  the  INTERDATA. 

Three  input  files  are  necessary  to  run  MINIGAP.  One  of 
these  is  the  input  parameter  file,  set  up  by  the  user.  This 
is  described  in  the  user's  documentation  guide.  A driver 
file,  which  contains  organization  and  account  codes,  is  also 
necessary.  This  file  is  described  in  one  of  the  following 
sections  'DRIVER  FILE'.  The  other  input  file  contains  the 
data  for  the  organization.  This  is  described  in  the  next 
section,  'MASTER  FILE. ' 

Only  one  output  file  is  necessary.  Device  #15  should  be 
assigned  to  this  file.  All  error  messages  and  system  generated 
responses  will  be  sent  to  this  file.  If  the  parameter 
•OUTPUT'  is  equated  to  another  device  (such  as  #14),  the 
report  will  be  sent  to  this  device,  instead  of  device  #15. 

This  will  separate  the  report  from  the  MINIGAP  system  messages. 

A limited  number  of  devices  are  available  to  the  user. 

The  description  of  the  overlays  is  in  the  section  titled 
•OVERLAYS. • 


MASTER  FILE 


The  master  file  contains  all  the  data  used  by  MINIGAP.  It 
contains  account  data  for  each  organization,  for  each  time  period. 

It  is  the  most  difficult  file  to  work  with,  since  some  special 
facility  (such  as  a database  management  system)  must  be  available 
to  create  and  update  it.  MINIGAP  only  reads  from  the  file  to  get 
the  data  for  the  reports.  It  does  not  allow  a user  to  access  the 
master  file  directly,  nor  write  to  it. 

The  entire  file  is  a fixed  length,  binary  file.  It  is  accessed 
using  random  access  I/O.  It  must  contain  m records,  where: 

m = (number  of  organizations  x number  of  time 
periods)  + 1. 

Each  record  will  contain  double  precision  cumulative  data  for  each 
accoxant  and  the  account  codes.  There  is  one  record  per  organization 
per  time  period. 

The  first  record  in  the  file  does  not  contain  data.  It  contains 
information  for  the  time  periods.  This  first  record  must  be  long 
enough  to  contain  all  the  information  for  all  the  time  periods. 

Since  the  file  is  a fixed  length  file,  the  record  length  must  be 
long  enough  to  accommodate  the  time  periods  in  the  first  record,  and 
the  accounts  in  the  remaining  records.  To  ensure  these  conditions, 
the  following  equations  must  hold: 

number  of  accounts  = ((record  length/4) -4)/3 
number  of  time  periods  = ((record  length/8) -24) /5 

The  master  file  should  be  set  up  with  a record  for  each  organi- 
zation. Organizations  include:  all  organizations  at  level  1,  the 
subtotals  at  levels  2 and  3,  and  the  overall  total  at  level  4. 
Therefore,  some  sophisticated  method  of  data  entry  is  required. 

This  method  must  be  able  to  create  the  subtotals,  and  to  update  the 
necessary  subtotals  when  a change  is  made  in  a level  1 organization. 
Although  this  creates  more  work  at  data  entry,  it  allows  a faster 
access  time  since  each  siiJtotal  is  saved  and  doesn't  need  to  be 
recalculated  for  every  request. 

The  master  file  is  arranged  in  blocks  of  data.  Each  block  of 
records  represents  one  time  period.  Each  of  the  records  within  a 
block  represents  data  for  one  organization.  One  record  will  contain 
all  the  data  for  all  the  accounts  for  one  organization  one  time 
period.  The  layout  of  an  individual  record  containing  data  for  n ac- 
counts is: 
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1 Organization 

Time 

UIC 

Account 

Account 

1 Name 

Period 

Code 

Codes 

Data 

8 bytes 

2 bytes 

6 bytes 

n X 4 
bytes 

n X 8 

bytes 

All  the  records  concerning  one  time  period  will  be  stored  together. 

I Within  any  time  period  block,  the  organizational  data  should  be  in 

I the  same  order  as  within  the  other  time  period  blocks.  The  driver 

file  will  contain  a number  representing  the  organization's  relative 
position  in  a block.  The  beginning  of  a time  period  block  is  stored 
in  the  first  record  of  the  master  file.  Adding  these  two  numbers 
will  give  the  location  of  the  data  for  an  organization  at  a given 
time  period.  The  next  6 paragraphs  explain  the  first  record  of  the 
master  file.  These  paragraphs  describe  the  content  and  form  of  the 
record,  and  the  purpose  of  the  information. 

The  first  record  of  the  file  contains  the  information  for  the 
^ time  periods.  The  first  2n  words  (where  n = the  number  of  time 

periods)  will  contain  the  8 character  names  of  each  time  period. 

The  next  ^snwords  will  contain  a number  pointing  to  the  first 
record  of  each  time  period's  block  of  data.  These  numbers,  each 
contained  in  H word,  should  be  in  the  same  order  as  the  time  period 
^ names.  Since  the  first  record  is  not  used  for  data,  the  record 

1 number  at  the  start  of  the  first  time  period  will  equal  2. 

’ The  next  *5  n words  will  point  to  the  time  periods,  if  any, 

! which  would  contain  data  for  the  month  previous  to  this  time  period. 

When  EXTRCT  is  used  to  extract  the  data  from  the  master  file,  it 
will  use  this  pointer  (if  required)  to  retrieve  data  from  the  pre- 
vious month  time  period.  It  will  subtract  this  data  from  the  other 

data  retrieved  to  obtain  a monthly  amount.  (Note:  the  pointer  does 
not  have  to  point  to  the  time  period  for  the  previous  month.  However, 
J EXTRCT  will  still  perform  the  above  subtraction  if  the  data  type  is 

■ set  to  "M"  in  the  input  file. ) 

iThe  next  h n words  are  the  same  as  above,  except  that  they  are 
used  to  point  to  time  periods  for  the  previous  quarter.  (The  same 
NOTE  applies  here,  also,  for  data  type  "C".) 

IThe  next  *5  n words  will  point  to  another  time  period,  as  deter- 
mined by  the  user/programmer.  These  will  enable  a user  to  enter  a 
specific  time  period;  if  the  user  specifies  data  type  "P",  the  data 

(for  the  time  period  pointed  to  by  this  pointer  is  used.  One  possi- 
ble use  would  be  to  have  this  pointer  point  to  the  time  period  con- 
taining data  from  the  previous  year  at  this  time. 

I 
I 

I 
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The  next  ^ n words  are  used  in  the  same  manner  as  the  previous 
h n words.  A possible  use  for  these  pointers  could  be  to  point  to 
the  time  oeriod  from  the  base  year  at  this  time.  This  pointer  would 
be  used  if  the  data  type  was  given  as  "L". 

Any  or  all  of  these  pointers  could  be  ignored,  and  set  to  zero. 
This  would  only  allow  cumulative  data  to  be  accessed  directly  by  the 
user,  however. 

MINIGAP  is  set  up  to  accommodate  up  to  350  accounts  , 160 
organizations  and  100  time  periods.  These  bounds  may  be  changed  in 
the  dimensions  of  the  system.  The  size  of  the  master  file  is  deter- 
mined by  the  following  equation: 

SIZE  (in  bytes)  = (#  of  organizations  X # of  time  periods) 

X record  length. 

However,  the  size  of  a file  which  reaches  each  of  these  maximums  would 
be  67  megabytes.  The  disk  currently  used  with  this  Interdata  can 
store  up  to  25  megabytes;  however,  only  about  20  megabytes  are  free 
for  user  storage.  Therefore,  no  data  file  of  this  size  has  been  used 
with  MINIGAP,  although  files  which  reach  one  or  two  of  the  maximums 
have  been  used  successfully.  The  size  of  the  data  base  should  be 
less  than  20  megabytes,  and  none  of  the  bounds  (as  mentioned  pre- 
viously) should  be  exceeded.  (Note:  the  dimensions  will  really 
only  allow  348  accounts.  If  350  accounts  are  desired,  all  occurrences 
of  '348'  must  be  changed  to  '350'  in  the  MINIGAP  system.) 

These  bounds  were  chosen  to  accommodate  working  databases.  An 
enlargement  of  any  of  these  will  necessarily  enlarge  the  amount  of 
core  needed  to  run  MINIGAP.  Since  MINIGAP  requires  most  of  the 
available  core  of  the  Interdata  system  (which  has  256k  core) , these 
boundaries  were  not  raised.  They  may  be  raised  within  physical 
limits,  requiring  only  dimension  changes.  However,  if  more  than 
400  organizations  are  needed  (including  all  subtotals  from  the  four 
levels),  logic  changes  to  NXTKEY  and  the  user  documentation  would  be 
requi red. 
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DRIVER  FILE 


I 

I 

I 

I 


j 


I 
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This  file  determines  how  the  master  file  (data  file)  T 

is  accessed.  More  than  one  driver  file  could  exist  for  | j 

the  same  master  file.  It  contains  information  about  the  i | 

organization  hierarchy,  the  organization  codes,  and  the  j 

account  codes.  j i 

' 1 

One  of  the  main  restrictions  concerning  the  data  structure  l | 

is  that  it  must  be  hierarchical.  Within  this,  only  four  | 

levels  of  hierarchy  are  allowed.  The  organizations  are  accessed  i j 

from  the  bottom  to  the  top.  The  organizations  at  level-1  cannnot  ' 

be  broken  down  into  any  sub-groupings.  These  organizations  are 
arranged,  according  to  the  user's  instructions,  into  groups. 

Level  2 contains  subtotals.  All  the  organizations  within  group 

1 are  totalled  into  the  level-2  subtotal  for  group  1,  and  the 

same  for  any  of  ther  other  groups.  These  level-2  subtotals  can  1 

then  be  consolidated  into  level- 3 subtotals,  in  the  same  manner. 

Level-4  will  contain  the  total  of  all  the  organizations.  Each 
of  these  organizations  and  subtotals  are  numbered  in  the  driver  j 

file.  This  provides  the  order  of  output.  For  example,  the  first  j 

organization  output  for  any  group  will  always  be  the  one  indexed  ’ 

with  the  number  1. 

Because  of  the  size  restructions  on  MINIGAP,  the  number 
of  subdivisions  had  to  be  restricted.  This  otherwise  arbitrary 
restriction  limits  the  number  organizations  within  each  group 
to  19,  with  the  subtotal  being  the  20th  organization.  This 
structure  is  also  built  into  the  function  NXTKEY.  Changing 
this  restriction  would  mainly  involve  changes  to  NXTKEY,  the 
drive  file,  and  the  user  documentation. 

The  first  line  of  the  driver  file  is  used  to  specify  the 
record  length  used  in  the  master  file.  This  number  is  used  to 
calculate  the  number  of  accounts  possible  and  the  number  of  time 
periods  possible.  This  number  is  right  justified  in  the  first 
five  spaces. 


The  following  n lines  contain  the  organization  data. 
There  is  a line  for  each  organization,  and  each  subtotal. 
The  following  information  is  contained  on  each  line: 

1.  A unique  8-character  alphanumeric  name  for  the 
organization  or  subtotal,  followed  by  one  blank. 

2.  A two  digit  number  not  to  exceed  20,  specifying 
the  organization's  rank  at  level-1. 
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3.  A two  digit  number,  not  to  exceed  20,  which  specifies 
the  subtotal,  or  level-2  group,  of  which  the  organization 

is  a member.  (The  combination  of  this  number  with  the 
previous  number  must  uniquely  specify  the  organization  or 
subtotal. ) 

4.  A two  digit  number,  not  to  exceed  20,  which  specifies 
the  subtotal,  or  level-3  group  of  which  the  organization  is 

a member.  This  is  followed  by  two  blanks. 

5.  A six  digit  alphanumeric,  unique  identifier  code 

for  the  organization  or  subtotal,  (This  is  not  presently  used, 
but  the  information  is  there  if  necessary.) 

6.  A three  digit  number  which  specifies  the  relative 
location  of  the  data  for  this  organization  or  subtotal  within 
the  master  file.  This  number  specifies  what  data  will  be 
accessed  when  this  organization  is  requested.  This  followed 
by  one  blank. 

7.  The  next  44  spaces  are  used  for  the  complete  name 
of  the  organization,  and  may  include  any  valid  symbols. 

Since  all  access  of  the  master  file  is  based  on  this  file, 
it  can  easily  be  seen  how  an  organization  may  be  deleted  or 
moved  within  the  hierarchy,  without  changing  the  master  file. 
Removal  of  the  organization  from  the  driver  file  essentially 
removes  it  from  the  user's  access.  Changing  items  2,  3 or 
4 (above)  can  be  used  to  "move"  the  organization  within  the 
hierarchy. 

After  the  lines  for  the  organizations,  the  following  line 
is  Included  as  a delimiter:  '0999'.  The  lines  following  this 
line  refer  to  the  accounts.  There  is  a line  for  each  account. 
The  account  codes  listed  here  must  include  all  the  valid 
accounts.  If  there  is  data  for  an  account  in  the  master  file, 
and  the  account  code  is  not  listed  in  the  driver  file,  that 
data  cannot  be  accessed  using  MINIGAP.  The  following  infor- 
mation is  contained  on  each  of  the  account  lines; 

1.  The  complete  name  of  the  account,  using  36  characters. 

2.  A four  digit  alphanumeric  account  code.  (The  routine 
'SPREAD',  used  to  spread  data  over  several  periods  in  REP005, 
REPOlO,  and  REPOll,  uses  methods  which  are  not  reasonable  for 
all  types  of  data.  This  routine  keys  on  the  first  two  digits 
of  the  account  code.  Therefore,  development  of  the  account 
codes  and/or  modifications  of  SPREAD  should  be  coordinated. 

For  further  information,  see  the  specification  sheets  for  the 
routine  SPREAD.) 
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I The  last  line  in  the  file  should  be  the  line:  '0999'.  The 

driver  file  must  be  set  up  manually.  MINIGAP  expects  it  to  contain 

I the  above  information,  and  uses  it  as  such,  without  providing  any 

checking. 

I Since  this  sets  up  the  organization  hierarchy,  account  coding, 

etc.,  the  development  of  the  driver  file/s  should  be  coordinated 
with  the  user/s. 

I 


< 


) 

SECTION  3.  DESCRIPTION  OF  REPORT  MODULES 


MAIN 


1.  The  main  routine,  FPDREP,  calls  FPD()01.  This  subroutine 
is  used  to  read  the  driver  file.  It  sets  up  all  the  tables 
and  indices  using  the  STORTV  routines,  to  allow  easy  access  to 
the  information  contained  in  the  driver  file.  The  information 
is  stored  so  that  all  the  information  for  one  organization  can 
be  accessed  using  the  same  index. 

2.  IFETCH,  a system  utility,  is  used  to  fetch  the  overlay 
containing  INITLZ  and  RDPARM  (see  the  section  OVERLAYS) . 

INITLZ  is  now  called  to  store  the  items  initialized  in  the 
block  data  routine  and  the  account  names  read  by  FPDp01  in  the 
array  Tl. 

3.  The  logical  units  containing  the  overlays  are  now  rewound,  so 
they  may  be  accessed  more  than  once.  COMPIL  is  now  called  to  read 
the  first  line  of  the  input  file.  This  line  is  assumed  to  give 
the  report  type.  COMPIL  only  checks  for  a number  following  an 
'!'.  This  number  is  assumed  to  specify  the  report  type,  and  is 
passed  back  via  the  variable  LINE.  (LINE  does  not  necessarily 
equal  the  number.)  If  an  end-of-file  is  reached,  signifying 

that  there  are  no  more  reports  requested,  FPDREP  generates  an 
‘END  OF  REPORT  PROCESSING'  message  and  stops. 

4.  PARSE  is  immediately  called  to  translate  the  results  of  COMPIL. 
The  number  is  now  stored  in  the  variable  VALUE.  FPDREP  outputs  a 
message  to  device  #15,  specifying  the  report  type  requested. 

5.  NODATA  is  called  to  initialize  its  variables  for  future  use. 

6.  IFETCH  is  called  again,  to  fetch  the  overlay  which  contains 
RDPARM. 

6a.  RDPARM  is  now  called.  It  will  read  the  input  parameters  line 
by  line,  until  is  reaches  a line  starting  with  'xx'.  It  will  read 
one  line  after  this,  which  it  assumes  to  be  the  title  of  the  report. 
If  an  end-of-file  is  reach  in  any  of  its  reads,  an  error  message 
is  output  to  device  #15  and  the  MINIGAP  run  stops.  It  will  compare 
the  value  given  for  each  parameter  with  its  range  (as  specified  in 
the  blockdata  subroutine).  If  it  exceeds  its  range,  RDPARM  will 
output  an  error  message  to  device  #15  and  set  the  parameter  to 
its  default  value.  (Any  parameters  which  are  not  specified  have 
already  been  set  to  their  default  value  in  INITLZ.) 

7.  FPDREP  now  uses  a computed  GOTO  to  fetch  the  desired  report 
type.  If  the  report  type  is  not  valide,  an  error  message  is 
output  to  devide  #15  and  the  MINIGAP  run  stops.  Otherwise,  the 
desired  report  generator  is  called.  When  control  returns  to 
FPDREP,  it  checks  to  see  if  any. more  reports  are  desired. 

(Control  goes  to  step  #3) 


REP002 


calls  other  routines,  but  already  denoted  on  page 
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1.  When  control  is  given  to  this  report  generator,  GETDAT 

is  called.  Since  GETDAT  reads  the  time  period  required  for  the 
report,  the  next  line  in  the  input  file  must  specify  the  time 
period.  If  this  line  does  not  contain  a valid  time  period,  an 
error  message  is  sent  to  device  #15  and  the  MINIGAP  run  stops. 

If  the  time  period  is  valid,  GETDAT  sets  up  the  variables 
which  will  later  be  used  by  EXTRCT  to  reference  the  correct  data 
in  the  master  file.  At  this  time,  GETDAT  outputs  to  device  #15 
its  translation  of  the  data  type  requested  (in  month,  year  and 
data  type) . 

2.  In  this  report,  only  one  time  period  may  be  specified.  After 
this  one  line  has  been  read  (step  #1,  above) , GETLST  is  called 

to  read  the  remaining  lines  of  the  input  file.  These  lines  should 
specify  the  rows  of  the  report.  GETLST  will  continue  reading 
lines  until  it  reaches  a line  beginning  '0999',  or  the  end-of- 
file,  or  more  than  50  accounts  and  calculations  have  been  read. 

In  the  latter  case,  an  error  message  is  output  to  device  #15, 
and  the  MINIGAP  run  stops.  Otherwise,  control  is  passed  back  to 
the  report  generator,  with  indices  to  the  accounts  and  computa- 
tions stored  in  the  array  EXP.  These  will  eventually  be  used  to 
output  the  rows  of  the  report.  The  array  INDEX  will  also  contain 
a code  to  specify  the  row.  If  an  account  is  requested,  INDEX 
will  be  assigned  a number  relative  to  the  account.  (Since  there 
are  N accounts,  these  numbers  will  range  from  1 to  N. ) If  a 
calculation  is  desired  the  number  assigned  will  be  greater  than 
N,  but  less  than  900.  Format  requests,  such  as  paging,  under- 
lining, etc.,  will  receive  codes  between  900  and  910. 

3.  The  report  generator  row  calls  the  function  NXTKEY  to  get  the 
relative  location  of  the  next  requested  organization.  It  will 
then  check  to  see  if  the  new  "activity"  is  in  the  same  "command" 
as  the  previous  (if  any)  "activity".  If  it  is  not,  control  is 
sent  to  NEWPAG  (step  #5). 

3a.  Otherwise,  the  variable  KEY  which  was  assigned  by  NXTKEY,  is 
checked.  If  it  equals  zero  (no  more  organizations) , this  report 
is  finished  and  control  returns  to  FPDREP  (main) . 


4.  EXTRCT  is  now  called  to  load  the  data  for  the  organization  into 
the  array  DATA  from  the  master  file.  The  organization  short-name, 
which  is  in  the  master  file,  is  loaded  into  the  array  TITLE,  to 
serve  as  the  column  heading.  The  report  generator  now  requests 
the  next  organization  (step  #3). 


5.  In  this  section,  NEWPAG  is  called  to  write  the  report  header 
and  the  column  headings.  The  variable  INDEX  is  now  checked  to 
determine  the  contents  of  the  row.  If  the  row  is  a formatting 
request  (INDEX-900),  control  is  given  to  WRTROW  (step  #8). 

If  the  row  contains  strictly  account  data  (no  calculations) , 
the  next  section  (step  #6)  is  skipped. 

6.  PARSE  is  now  called  to  compute  any  row  calculations,  using 
the  array  EXP,  which  was  previously  set  up  by  GETLST,  The  user- 
specified  label  for  the  computation  is  now  loaded  into  the  variable 
INAME.  The  calculated  data  is  loaded  into  the  array  A.  Control 

is  now  given  to  TABS  (step  #7a). 

7.  The  account  data  is  now  stored  in  the  variable  A,  according 

to  the  account  requested.  The  account  code  is  now  stored  in  INAME, 
for  the  row  label. 

7a.  TABS  is  now  called.  It  will  skip  blank  lines  on  the  report 
to  perform  the  vertical  tabbing.  It  will  load  the  row  labels 
(INAME)  into  JNAME,  and  will  insert  blanks  into  JNAME  to  perform 
the  horizontal  tabbing.  This  tabbing  will  be  executed  in  blocks 
of  four.  (For  a tab  of  2,  eight  blanks  will  be  inserted.) 

8.  WRTROW  is  called  to  output  the  row  onto  the  report.  Any  for- 
mat specifications  requested  in  the  input  parameter  list  will  be 
used  by  WRTROW.  It  will  load  commas  as  necessary,  output  the  cor- 
rect number  of  decimal  places,  etc.  After  V7RTR0W  has  returned 
control  (the  row  has  been  written) , the  variable  L is  checked  to 
determine  whether  all  the  columns  for  that  "command"  have  been 
written.  If  not,  control  is  returned  to  NEWPAG  (step  #5) . 

If  all  the  columns  have  been  written,  the  report  generator  checks 
to  see  if  any  more  organizations  have  been  specified.  This  is 
done  by  checking  the  variable  KEY.  (Control  is  returned  to 
step  # 3a. ) 
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1.  When  control  is  given  to  this  report  generator,  TSIZE  is 
set  equal  to  the  number  of  accounts  involved  for  this  database. 
GETDAT  is  then  called  to  read  the  time  period  from  the  input 
lis t.  If  this  line  does  not  contain  a valid  time  period,  an 
error  message  is  output  to  device  #15  and  the  MINIGAP  run  stops. 

If  the  time  period  is  valid,  GETDAT  sets  up  the  variables  which 
will  later  be  used  by  EXTRCT  to  reference  the  correct  data. 

At  this  time,  GETDAT  outputs  its  translation  of  the  time  period 
requested  (in  month,  year  and  data  type)  to  device  #15. 

2.  In  this  report,  only  one  time  period  may  be  specified.  After 
this  one  line  has  been  read  (setp  #1,  above)  COMP I L is  called. 

COMPIL  reads  a line  which  is  assumed  to  specify  the  column  contents. 
This  line  should  equate  a coliamn  with  either  an  account,  or  an 
account  calculation.  The  format  used  is:  Cn  = xxxx  where 

n = the  appropriate  column  number,  and  xxxx  represents  an  account 
code,  or  an  account  calculation.  The  report  generator  will  con- 
tinue calling  COMPIL,  once  for  each  column,  until  all  the  columns 
are  specified  or  there  is  no  more  input.  (If  the  latter  is  the 
case,  an  error  message  should  be  generated;  however,  this  does 
not  happen. ) 

3.  RDTITL  is  now  called  to  read  the  next  n (number  of  columns) 
lines.  These  should  contain  the  column  headings,  as  they  will 
be  treated  as  column  headings.  These  will  be  loaded  into  the 
appropriate  positions  of  the  array  TITLE,  and  will  be  centered. 

If  an  end-of-file  is  reached  before  all  the  columns  have  been 
titled,  an  error  message  results.  These  columns  will  not  have 
headings,  though. 

4.  All  the  input  has  now  been  processed,  and  NEWPAG  is  now  called 
to  write  the  heading  for  the  report. 

5.  the  function  NXTKEY  is  now  used  to  set  KEY  to  the  relative 
location  of  the  next  organization  requested.  If  this  equals  zero, 
there  are  no  more  organizations  required,  and  control  passes  to 
the  last  section  (step  #10).  At  the  beginning  of  a new  "command" 
group  (IROVV=l)  , ERRFLAG  and  FLAG  are  initialized  to  .false. 

(However,  to  avoid  any  possibility  of  error,  these  should  also 

be  initialized  at  the  start  of  this  report.) 

6.  KFETCH  is  now  called  to  obtain  the  index  which  points  to 
the  location  of  KEY  in  Kl.  (This  will  be  used  by  NODATA,  if  it 
is  necessary  to  call  NODATA  for  this  organization.)  If  the  KEY 
is  nout  found,  the  next  KEY  is  requested  (returning  to  step  #5). 
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7.  EXTRCT  is  called  to  read  the  correct  data  from  the  master 
file  into  the  variable  DATA.  If  no  data  is  present  for  this 
activity,  control  is  passed  to  NODATA  (step  #7a).  Otherwise, 
control  passes  to  the  next  section  (step  #8). 

7a.  NO DATA  is  called  using  the  index  obtained  from  KFETCH. 

ERRFLAG  is  also  set  to  .true,  to  show  that  at  least  one  activity 
in  that  "command"  has  no  data. 

8.  All  the  data  returned  by  EXTRCT  is  now  loaded  into  areas 
of  the  array  SPACE,  based  on  the  account  codes.  PARSE  is  now 
called  to  perform  any  column  calculations,  and  put  the  accounts 
in  the  right  columns.  The  data  is  now  stored  in  the  array  A. 

PARSE  is  called  for  each  column. 

9.  If  the  organization  represents  a sub-total,  IFLAG  is  set  to 
mark  the  row  off  with  based  lines.  In  addition,  if  any  data  was 
missing  from  this  subtotal  (ERFLAG  - .true.),  FLAG  is  set  to 
output  an  asterisk  uo  the  left  of  the  row.  WRTROW  is  now  called 
to  write  this  row.  The  next  organization  is  then  fetched,  using 
NXTKEY  (control  returns  to  step  #5). 

10.  NODATA  is  now  called.  This  step  is  reached  when  the  report 
is  finished.  NODATA  will  write  a message  (footnote)  to  the  report 
if  data  for  any  of  the  reported  organizations  (or  sub-totals)  was 
missing.  It  will  also  reset  its  variables  for  the  next  report. 
Since  the  report  is  now  finished,  control  is  returned  to  FPDREP 
(main) . 
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1.  When  control  is  given  to  this  report  generator,  TSIZE  is  set 
equal  to  the  number  of  accounts  in  the  database.  GETDAT  is  then 
called  to  read  tl'ie  time  period/s  for  this  report.  The  maximum 
number  of  time  periods  used  in  this  report  is  equal  to  the  number 
of  columns.  GETDAT  will  read  the  next  n lines  of  the  input  file 
as  time  periods,  (when  n = the  number  of  columns)  unless  it 
reaches  a line  beginning  with  '0999'  (which  signifies  the  end 

of  the  time  period  specifications),  or  an  invalid  time  period, 
or  an  end-of-file.  Each  of  these  cases  terminates  the  reading 
done  by  GETDAT.  The  last  two  cases  will  cause  an  error  message 
to  be  sent  to  device  #15,  and  the  MINIGAP  run  will  stop.  For 
each  correct  time  period  input,  GETDAT  sets  up  the  variables  which 
will  later  be  used  by  EXTRCT  to  reference  the  correct  data. 

GETDAT  will  also  output  its  translation  of  each  time  period 
requested  (in  month,  year  and  data  type) . 

2.  COMP I L is  now  called,  to  read  the  column  specifications. 

It  will  read  one  line  for  each  column,  unless  it  reaches  the 
end-of-file.  If  there  are  too  few  column  specifications,  the 
output  for  the  remaining  columns  will  be  underfined.  However,  no 
error  message  is  output  to  bring  the  user's  attention  to  this 
input  problem,  and  the  run  continues.  (An  error  message  will  be 
output  by  RDTITL,  though  when  it  too  reaches  an  unexpected  end- 
of-file.)  Since  column  calculations  are  allowed  in  this  report, 
there  are  two  ways  to  specify  the  column's  contents.  If  the 
column  merely  contains  data  for  a time  period,  the  format  is: 

Cn  = a 

where  n equals  the  number  of  the  column  and  a is  an  element  of 
(A,  B,  C...).  'A'  represents  the  first  time  period  requested, 

'B'  represents  the  second,  etc.  If  the  column  is  computed  from 
one  or  more  time  periods,  the  following  format  is  used: 

Cn  = f(a,b) 

where  f(a,b)  is  an  arithmetic  calculation  involving  time  periods 
('A',  'B',  etc.),  columns  ('Cl',  'C2',  etc.),  and/or  numerical 

constants  (which  must  always  be  preceded  by  an  ' I ' ) . 

3.  RDTITL  is  called,  to  read  the  headings  for  each  column. 

RDTITL  will  read  the  next  n lines  (where  n = the  number  of 
columns) , treating  each  line  as  the  next  column  heading.  If  an 
end-of-file  is  reached  before  RDTITL  has  read  a heading  for  each 
column,  the  remaining  columns  will  be  output  untitled  by  NEWPAG, 
and  an  error  message  will  be  output  to  device  #15. 
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4.  GETLST  is  now  called  to  read  the  row  specifications.  It 
will  continue  reading  the  lines  in  the  input  file  until  a line 
beginning  with  *0999'  is  reached,  or  the  end-of-file,  or  more 
than  50  accounts  and  account  computations  have  been  read.  In 
the  latter  case,  an  error  message  will  be  output  to  device  #15 
and  the  MINIGAP  run  will  stop.  Otherwise,  GETLST  will  store 
the  accounts  and  computations  using  the  arrays  INDEX  and  EXP. 

The  arry  INDEX  will  contain  a code  to  specify  the  row.  If  an 
account  is  requested,  INDEX  will  be  assigned  a number  relative 
to  the  account.  (Since  there  are  n accounts,  these  numbers  will 
range  from  1 to  n.  ) If  a calculation  is  desired,  the  number 
assigned  will  be  greater  than  n,  but  less  than  900.  Format 
requests,  such  as  paging  and  underlining,  will  receive  codes 
between  900  and  910. 

5.  KEY  is  is  set  equal  to  the  relative  location  of  the  next 
"activity"  requested,  using  NXTKEY.  If  KEY=0 , there  are  no  more 
"activities"  to  be  output,  and  control  is  returned  to  FPDREP. 

5a.  Otherwise,  KFETCH  is  called  to  test  the  validity  of  the 
"activity".  If  the  "Activity"  is  valid  (contained  in  the  driver 
file),  IXACTY  is  set  to  equal  the  index  to  the  "activity".  This 
is  later  used  to  access  the  name  of  the  "activity".  If  KFETCH 
could  not  fetch  the  "activity"  a new  "activity"  will  be  requested 
using  NXTKEY  (step  #5) . 

6.  For  each  time  period  requested,  EXTRCT  is  called  to  retrieve 
the  data  from  the  master  file  and  put  it  into  the  array  DATA. 

6a.  If  SPREAD  data  is  requested  for  a time  period  (as  specified 
in  the  input  read  by  GETDAT)  SPREAD  is  called  to  spread  the  data 
for  that  time  period  as  desired  (Since  SPREAD  keys  on  account 
codes,  the  development  of  these  should  be  coordinated  with  SPREAD) . 

7.  NEWPAG  is  now  called  to  write  the  report  header  and  the  column 
headings  for  the  page. 

8.  The  elements  of  the  array  INDEX  are  now  checked.  If  INDEX 
is  greater  than  900,  the  row  contains  no  data,  and  control  skips 
to  WRTROW  (step  #11).  If  INDEX  is  less  than  or  equal  to  the 
number  of  accounts,  no  row  calculations  have  to  be  performed. 
Control  skips  over  the  computations  of  the  rows  to  the  second 
PARSE  call  ‘(step  #9b)  . 


Otherwise,  INDEX  indicates  that  a row  calculation  (between 
accounts)  has  to  bo  performed.  For  each  account,  and  each  column, 
PARSE  is  called  to  load  the  calculated  data  into  the  array  A. 

9a.  PARSE  is  now  called  again,  for  each  column,  to  do  the  column 
calculations  (between  time  periods).  This  call,  v/hich  is  the 
second  call  to  PARSE,  is  applied  to  those  rows  involving  row 
calculations.  The  row  labels  are  loaded  into  INAiME  at  this  time, 
using  the  user-supplied  strings  previously  input.  Control  is  sent 
to  TABS  (step  #10). 

9b.  The  next  call  to  PARSE  (the  third  call)  does  the  same  thing 
(column  calculations;  as  the  prior  call.  However,  this  call 
applies  only  to  non-computed  account  rov/s , while  the  previous 
call  applies  only  to  calculated  rov;s.  The  row  labels  are  loaded 
into  INAME  at  this  time,  from  the  array  MNAMES,  which  contains 
the  account  names. 

10.  TABS  is  now  called,  to  provide  horizontal  tabbing  for  the 
INAME  array,  and  store  it  in  the  JNAiME  array.  Blank  lines  will  be 
output  to  the  report  at  this  time  for  the  vertical  tabbing. 

11.  WRTROW  is  now  called  to  write  the  row.  The  report  generator 
will  check  to  see  if  all  rows  have  been  written.  If  not,  control 
skips  back  to  check  the  contents  of  the  new  row  (step  #8).  If  all 
the  rows  have  been  output,  REP005  now  checks  to  see  whether  any 
columns  did  not  fit  on  the  132  character-wide  page.  If  there  are 
any  remaining  columns,  control  skips  to  start  a new  page  (step  #7). 

12.  REP005  continues  with  a new  page  for  the  next  activity,  passin 
control  to  NXTKEY  (step  #5). 
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1.  When  REPOll  is  given  control,  TSIZE  is  set  equal  to  the 
number  of  accounts  involved  (according  to  the  driver  file). 

Then,  GETDAT  is  called  to  read  the  next  lines  which  specify 
the  time  periods  for  each  column.  GETDAT  will  read  a line 

for  each  column,  until  it  reaches  a line  beginning  with  '0999', 
an  end-of-file,  or  an  invalid  data  type. 

In  the  latter  two  cases,  an  error  message  is  output  to  device 
#15,  and  the  MINIGAP  run  stops.  Otherwise,  GETDAT  sets  up  the 
variables  which  will  later  be  used  by  EXTRCT  to  reference  the  data 
in  the  master  file.  GETDAT  will  also  output  its  translation  of 
each  of  the  time  periods  to  device  #15  (in  month,  year  and  data 
type ) . 

2.  COMP I L is  now  called  for  each  column,  to  read  the  column 
specifications . It  will  read  one  line  for  each  column,  unless 

it  reaches  an  end-of-file.  If  there  are  too  few  column  specifica- 
tions, the  remaining  columns  will  be  undefined.  No  error  message 
will  be  output  at  this  time;  however,  when  RDTITL  is  called,  later, 
and  receives  an  end-of-file,  an  error  message  will  be  output  con- 
cerning the  column  headings.  The  column  specifications  for  this 
report  have  the  same  format  as  those  for  REP005.  (See  step  #2  of 
REP005  for  the  formatting  and  contents  of  column  specifications.) 

3.  RDTITL  is  called,  to  read  the  headings  for  each  column.  RDTITL 
will  read  the  next  n lines  (where  n = the  number  of  columns) , treating 
each  line  as  a column  heading.  If  an  end-of-file  is  reached  before 
RDTITL  has  read  a heading  for  each  column,  the  remaining  columns 

will  be  output  untitled  by  NEWPAG,  and  an  error  message  will  be 
output  to  device  #15. 

4.  GETLST  is  now  called  to  read  the  remaining  lines.  These  lines 
should  contain  account  codes  or  account  computations.  Each  of  these 
will  be  used  for  a different  report;  therefore,  formatting  specifi- 
cations should  not  be  used,  since  they  have  no  meaning  in  this  con- 
text. GETLST  will  continue  reading  lines,  until  it  reaches  a line 
beginning  with  '0999',  an  end-of-file,  or  more  than  50  accounts 
and/or  calculations  have  been  specified. 

In  the  latter  case,  an  error  message  will  be  output  to  device 
#15,  and  the  MINIGAP  run  will  stop.  Otherwise,  GETLST  will  store 
the  accounts  and  computations  using  the  arrays  INDEX  and  EXP.  The 
array  INDEX  will  contain  a code  to  specify  the  report.  If  an  account 
is  requested,  INDEX  will  be  assigned  a number  relative  to  the  account. 
(Since  there  are  n accounts,  these  numbers  will  range  from  1 to  n. ) 
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If  a calculation  is  desired,  the  niiinber  assigned  will  be  greater 
them  n and  less  than  900.  No  formatting  should  be  specified; 
however,  this  will  not  cause  any  errors  at  this  point. 

5.  INDEX  is  now  checktva,  to  determine  tlie  contents  of  the  report. 

If  a formatting  line  is  specified,  control  is  given  to  WRTROh’ 

(step  #12),  with  IXACCT  and  IXACTY  retaining  their  previous,  if  any, 
values.  (This  should  probably  generate  an  error  message  of  some 
sort,  since  the  result  is  meaningless.)  If  an  account  is  specified, 
the  account  name  is  loaded  into  INAME  (to  be  used  as  the  report 
label) . For  an  account  calculation,  the  label  for  the  calculation 
is  loaded  from  NAMES  into  INAME. 

6.  NEWPAG  is  now  called  to  output  the  report  header,  and  the 
column  headings. 

7.  KEY  is  set  equal  to  the  relative  location  of  the  next  organization 
requested,  using  NXTKEY.  If  KEY  4 0 (more  organizations  for  report) , 
control  is  sent  to  KFETCH  (step  #8). 

7a.  For  KEY  = 0 (no  more  organizations  for  this  report),  NEWKEY 
is  called,  to  reinitialize  the  NXTKEY  variables.  If  there  are  any 
more  reports  to  be  output  (as  specified  by  the  input  to  GETLST) 
control  now  returns  to  check  INDEX  (step  #5) . Otherwise,  control 
is  returned  to  FPDREP  (main) . 

8.  KFETCH  is  now  called  to  check  the  validity  of  KEY,  and  to 
store  the  index  to  the  organization  in  IXACTY.  If  the  KEY  is 
invalid,  the  next  KEY  is  fetched  (returning  control  to  step  #7). 

9.  For  each  time  period,  EXTRCT  is  called  to  load  the  data  from 
the  master  file  into  the  array  DATA.  If  the  time  period  has  speci- 
fied that  the  data  be  spread,  SPREAD  is  also  called.  It  will  mani- 
pulate the  data  in  the  array  DATA  to  appear  as  thought  it  were 
spread  over  a period  of  time. 

10.  PARSE  is  now  called  for  each  column,  to  load  the  proper  data 
into  the  correct  column,  and  perform  any  column  calculations  as 
specified.  After  this  is  completed,  the  report  generator  will 
check  to  see  if  a computation  has  been  specified  for  the  report. 

If  not,  control  skips  to  WRTROW  (step  #12). 

11.  Since  a page  computation  has  been  requested,  PARSE  is  called, 
for  each  account  and  column,  to  compute  the  data  as  specified. 

Then,  for  each  column,  PARSE  is  called,  again,  so  that  all  relations 
between  columns  will  be  those  specified  (as  input  to  COMPIL)  by  the 
user. 

12.  WRTROW  is  now  called  to  write  the  row  for  this  organization. 

It  uses  the  IXACTY  index  to  write  the  activity  name  for  the  row 
label.  If  the  data  to  be  output  represents  a subtotal,  IFLAG  is 
set  to  cause  the  row  to  be  set  off  by  hashed  lines.  The  next 
organization  is  fetched  after  this  row  is  written.  (Control  returns 
to  step  #7. ) 
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Software  Name:  BLOCKM 
Jype:  Common  Block 

Software  Author: H.  Hinman,  C.  Martin 
Person  in  charge  of  maintenance:  s.  Masieiio 
Date  Last  Revised:  1/10/78 
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Software  Name:  BLOCK! 

Type:  Common  block  (con't) 

Software  Author:  H.  Hinman,  C.  Martin 
Person  in  charge  of  maintenance:  S.  Masiello 
Date  Last  Revised:  11 /H/?? 
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Software  Author:  H,  Hirunan,  C,  Martin 

Person  in  charge  of  maintenance:  So  Masiello  Cont 

Date  Last  Revised:  2/9/7S 
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Softv/are  Name:  COMPIL 

Type:  Subroutine 

Software  Author:  Ho  Hinman,  Co  Martin 

Person  in  charge  of  maintenan9e:  So  Masiello  Cont 

Date  Last  Revised:  • 2/9/7S 
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Software  Name:  EXTRCT 

Type:  Subroutine 

Software  Author:  Ho  Hinman,  C.  Martin 
Person  in  charge  of  maintenance:  s,  Masiello 
Date  Last  Revised:  2/9/7S 
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Software  Name:  EXTHUT 

Type:  Subroutine 

Software  Author:  H,  Hinraan,  C.  Martin 

Person  in  charge  of  maintenanfe:  S.  Masiello  Cont 

Date  Last  Revised:  2/9/7S 
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Software  Name:  SXTRGT 

Type:  Subr'outine 

Software  Author:  Ho  Hinman,  C,  Martin 

Person  in  charge  of  mdintenan9e:  So  Masiello 

Date  Last  Revised:  ' 2/9/7 S Cont 


Software  Name:  YFD001 
Type:  Subroutine 

Software  Author:  H.  Hinman,  C.  Martin 

Person  in  charge  of  maintenance:  S.  Masiello 
Date  Last  Revised:  2/9/7S 
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software  Nairc;  GEi'UHR 
Type:  F\inction 

Software  Author:  H*  Hinman,  C.  Martin 
Person  in  charge  of  maintenance:  S*  Masiello 
Date  Last  Revised:  ll/ll/77 


Software  Name;  GETDAT 
Type:  Subroutine 

Software  Author:  Ho  Hinman,  C.  Martin 
Person  in  charge  of  maintenance:  s..  Masiello 

Date  Last  Revised:  2/9/7S 
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Software  Name:  TSTORE,DSTORE 
Type:  Subroutiuo 

Software  Author:  h.  Hinman,  C«  Martin 
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Software  Name:  KFETCH,DFETCH 
Type:  Subroutine 

Software  Author:  H.  Hinman,  C.  Martin 
Person  in  charge  of  maintenance:  S.  Masiello 
Date  Last  Revised:  2/9/7^ 
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Software  Name:  PARAMS 

Type:  Common  block 

Software  Author:  Ho  Hinraan,  C.  Martin 

Person  in  charge  of  maintenance:  S,  Masiello 

Date  Last  Revised:  9/16/77 
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Sortware  I'tame:  kuPARi^i 
Type:  Subroutine 

Software  Author:  H.  Hinman,  C.  Martin _ 
Person  in  charge  of  maintenance:  S.  Masiello 
Date  Last  Revised:  2/9/78 


Software  Name:  READIT 

Type:  Subroutine 

Software  Author:  H.  Hinman,  C«  Martin 

Person  in  charge  of  maintenance:  S.  Masiello 

Date  Last  Revised:  2/9/78 
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Type:  Subroutine 

Software  Author:  Ho  Hinman,  C#  Martin 

Person  in  charge  of  maintenance:  So  Masiello  Cont 

Date  Last  Revised:  2/9/78 
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Software  Name:  REP002 

Type:  Subroutine 

Software  Author:  H.  Hinman,  C,  Martin 
Person  in  charge  of  maintenance:  S.  Masiello 
Date  Last  Revised:  1/11/7^ 
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Software  Author:  H.  Hinman,  C.  Mart 

Person  in  charge  of  maintenance:  S.  Masiello 
Date  Last  Revised:  I/II/7S 


I 


•H 


Sortware  Name: 

Type:  Subroutine 

Software  Author:  H.  Hinman,  C.  Martin 

Person  in  charge  of  maintenan9e:  So  Masiello 
Date  Last  Revised:  2/9/78 
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NEWPAG, 


OVERLAYS 


The  use  of  overlays  was  necessary  to  reduce  the  working  size 
of  MINIGAP.  All  of  the  utility  routines,  and  the  main  routine, 
with  the  exception  of  INITLZ  and  RDPARM,  are  in  the  main  segment. 
INITLZ  and  RDPARM  are  in  one  overlay  and  the  five  repo;  c generators 
are  in  the  other  five  overlays.  The  six  overlays  and  the  main 
task  constitute  the  MINIGAP  system. 

The  overlays  were  set  up  using  the  Interdata  Task  Establisher 
(TET) . The  system  routine  IFETCH  must  be  called  before  any  of  the 
routines  in  an  overlay  can  be  fetched  by  a FORTRAN  call.  Before  a 
successive  fetch  to  an  overlay,  that  overlay  must  be  rewound. 

It  could  be  possible  to  remove  the  block  data  subroutine  and  FPDOOl 
from  the  main  segment  and  place  these  in  overlays.  However,  an 
attempt  to  do  this  has  generated  error  messages  from  TET.  In  the 
interest  of  time,  this  attempt  was  abandoned  before  knowing  whether 
it  actually  could  be  done.  (If  it  were  constrained  only  by  program 
logic,  it  could  be  done,  since  these  are  both  only  used  once,  at 
the  start  of  a MINIGAP  run. ) 

If  necessary,  MINIGAP  could  probably  be  separated  into  more 
overlays.  This  would  require  a certain  amount  of  caution  to  insure 
that  everything  could  be  accessed  at  the  proper  time. 
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f I Account  codes,  1-1,  2a-l , 2a-2. 

j 1 number  of,  2a-3. 

^ , BLOCKS,  4-2,  4-3. 

f I BLOCKD,  blockdata,  4-4. 

' common  block,  4-5,  4-6,  4-7. 

' , BLOCKK,  4-8,  4-9. 

1 BLOCKM,  4-10,  4-11. 

J BLOCK!,  4-12,  4-13. 

; BLOCKU,  4-14,  4-15. 

! ■ COMPIL,  4-16/4-18. 


DDIVID,  4-19. 

{ DOROND,  see  ROUND. 

DFETCH  see  KFETCH,  STORTV. 

Driver  file,  1-1,  2a-2,  2b-l,  2b-2, 
i 3a-2. 

DROUND,  see  ROUND. 

DSTORE  see  I STORE,  STORTV. 

i EXTRCT,  4-20/4-23. 

. Flow  charts,  REP002,  3b-4. 

f REP004,  3c-4. 

REP005,  3d-5. 

REP011,  3f-4. 

I Flow  of  control  charts.  Main,  3a-l. 

* REP002,  3b- 1. 

REP004,  3c- 1. 

I REP005,  3d-l. 

j REP010,  3e-l. 

REP011,  3f-l. 

FPD001,  4-24,  4-25. 

I FPDREP,  flew  of  control,  3a-l. 

* description,  3a-2. 

module  chart,  4-26;  see  also  Main. 

I General,  1-1. 

GETCHR,  4-27. 

, GETDAT,  4-28/4-32. 

j GETLST,  4-33,  4-34. 

, INITLZ,  4-35. 

j Input  files,  2-1 . 

’ Input  parameters,  1-1. 

INTGER,  4-36,  4-37. 

1 ISTORE,  4-38,  4-40,  see  STORTV. 


KFETCH,  4-41/4-43,  see  STORTV. 

Length,  master  file  records,  2a-l. 

Main  (FPDREP),  3a-l,  3a-2. 

Master  file,  1-1,  2a-l/2a-3. 
size,  2a-3. 

MINIGAP  module  charts,  4-1/4-75. 

N,  4-44. 

NEWKEY,  see  NXTKEY. 

NEWPAG,  4-45,  4-46. 

NODATA,  4-47. 

NXTKEY,  4-48,  4-49. 

Organization  codes,  1-1,  2a-2. 
levels,  2a-l. 
member  of,  2a -3. 
record  location,  2a-2. 

Output  file,  1-1. 

Overlays,  1-1,  5-1,  5-2. 

Parameters,  see  Input  parameters. 

PARAMS,  4-50,  4-51. 

PARSE  see  COMPIL. 

RDPARM,  4-52. 

RDTITL,  4-53. 

READIT,  4-54,  4-55. 

Record  length,  master  file,  2a-l. 

REP002,  description,  3b-2,  3b-3. 
flow  chart,  3b-4. 
flow  of  control,  3b-l. 
module  chart,  4-56. 

REP004,  description,  3c-2,  3c-3. 
flow  chart,  3c-4. 
flow  of  control,  3c-l. 
module  chart,  4-57. 

REP005,  description,  3d-2,  3d-3,  3d-4. 
flow  chart,  3d-5. 
flow  of  control,  3d-l. 
module  chart,  4-58. 

REP010,  flow  of  control,  3e-l. 
module  chart,  4-59. 

REP011,  description,  3f-2,  3f-3. 
flow  chart,  3f-4. 
flow  of  control,  3f-l. 
module  chart,  4-60. 
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ROUND.  4-61. 

SPREAD,  4-62,  4-63. 

SSR006,  4-64. 

STORTV,  4-65;  see  ISTORE,  KFETCH. 
System  configuration,  1-1. 

TABS,  4-66/4-68. 

TITLES,  4-69,  4-70. 

Time  periods,  2a-l,  2a-2,  2a-3. 

number  of,  2a- 3. 

UIC  code,  2a-2. 

WORKA,  4-71. 

WORKB,  4-72. 

WRTROW,  4-73/4-75. 


